home *** CD-ROM | disk | FTP | other *** search
- object ATTRIBDLG: TATTRIBDLG
- Tag = 1
- Left = 238
- Top = 205
- HelpContext = 140
- BorderIcons = [biSystemMenu]
- BorderStyle = bsDialog
- Caption = 'Change attributes'
- ClientHeight = 262
- ClientWidth = 316
- Font.Color = clBtnText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Position = poScreenCenter
- PixelsPerInch = 96
- TextHeight = 13
- object Panel1: TPanel
- Left = 4
- Top = 164
- Width = 309
- Height = 61
- BevelInner = bvRaised
- BevelOuter = bvLowered
- TabOrder = 2
- object Date: TLabel
- Tag = 13
- Left = 10
- Top = 33
- Width = 59
- Height = 20
- AutoSize = False
- Caption = '&Date:'
- FocusControl = AttrDate
- WordWrap = True
- end
- object Time: TLabel
- Tag = 14
- Left = 168
- Top = 33
- Width = 57
- Height = 20
- AutoSize = False
- Caption = '&Time:'
- FocusControl = AttrTime
- WordWrap = True
- end
- object AttrChangeDate: TCheckBox
- Tag = 12
- Left = 10
- Top = 4
- Width = 297
- Height = 21
- Caption = '&Change date/time:'
- TabOrder = 0
- OnClick = AttrChangeDateClick
- end
- object AttrDate: TEdit
- Left = 69
- Top = 31
- Width = 92
- Height = 21
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 1
- Text = 'dd/mm/yyyy'
- OnEnter = AttrDateEnter
- end
- object AttrTime: TEdit
- Left = 224
- Top = 31
- Width = 77
- Height = 21
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- Text = 'hh:mm:ss'
- OnEnter = AttrDateEnter
- end
- end
- object AttribRecurse: TCheckBox
- Tag = 5
- Left = 14
- Top = 6
- Width = 301
- Height = 19
- Caption = 'R&ecurse subdirectories'
- TabOrder = 0
- end
- object Changeattributes: TGroupBox
- Tag = 6
- Left = 4
- Top = 27
- Width = 309
- Height = 126
- Caption = ' Change attributes '
- TabOrder = 1
- object UnchangedSetClear: TLabel
- Tag = 11
- Left = 10
- Top = 104
- Width = 296
- Height = 20
- AutoSize = False
- Caption = '(gray = unchanged, checked = set attribute)'
- end
- object aArchive: TMyCheckBox
- Tag = 7
- Left = 10
- Top = 20
- Width = 297
- Height = 17
- AllowGrayed = True
- Caption = '&a Archive'
- TabOrder = 0
- end
- object rReadonly: TMyCheckBox
- Tag = 8
- Left = 10
- Top = 41
- Width = 297
- Height = 17
- AllowGrayed = True
- Caption = '&r Read only'
- TabOrder = 1
- end
- object hHidden: TMyCheckBox
- Tag = 9
- Left = 10
- Top = 63
- Width = 297
- Height = 17
- AllowGrayed = True
- Caption = '&h Hidden'
- TabOrder = 2
- end
- object sSystem: TMyCheckBox
- Tag = 10
- Left = 10
- Top = 84
- Width = 297
- Height = 17
- AllowGrayed = True
- Caption = '&s System'
- TabOrder = 3
- end
- end
- object Ok: TButton
- Tag = 4001
- Left = 61
- Top = 236
- Width = 80
- Height = 23
- Caption = 'Ok'
- Default = True
- ModalResult = 1
- TabOrder = 3
- OnClick = OkClick
- end
- object Cancel: TButton
- Tag = 4002
- Left = 146
- Top = 236
- Width = 80
- Height = 23
- Cancel = True
- Caption = 'Cancel'
- ModalResult = 2
- TabOrder = 4
- end
- object id_GlobalHelp: TButton
- Tag = 4003
- Left = 232
- Top = 236
- Width = 80
- Height = 23
- Caption = '&Help'
- TabOrder = 5
- OnClick = id_GlobalHelpClick
- end
- object Translate1: TTranslate
- Tag = 5040
- Top = 232
- end
- object ResolutionFix1: TResolutionFix
- Left = 32
- Top = 232
- end
- end
-